<SCRIPT> /* $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ SCRIPT BY GREG BLAND dabomb@lorien.ml.org http://dabomb.lorien.ml.org this script is (C)copyright 1998 Greg Bland all rights reserved you can only use this script under 2 conditions 1. You leave author name email address and URL on it 2.You may not incur profits from this script Written Permission from dabomb@lorien.ml.org is required in order to incur $$ from the script or to take off my name.... */ function choice() { //return what user selected return document.chooser.choice.selectedIndex } function seeit() { //find number selected var want = choice() + 1 var num = fileid[want] var to = loc[num] //go to URL in new window window.open(to,"","") } function viewcode() { //find number selected var want = choice()+1 var num = fileid[want] var to = loc[num] //view source in new window window.open("view-source:"+to+"","","") } function disp() { //find num selected var want = choice()+1 var num = fileid[want] var msg = info[num] var aut = author[num] //display info about page/script an author document.chooser.mesg.value = msg document.chooser.auth.value = aut } function MakeArray(n) { //allow new array to be made below... this.length = n for (i = 0;i<n;i++) this[i] = null } //do not modify below or if you want to ad one, do //var something = new MakeArray(loc.length) after fileid var loc = new MakeArray(1); var author = new MakeArray(loc.length); var info = new MakeArray(loc.length); var fileid = new MakeArray(loc.length); //can modify below loc[1] = "http://dabomb.lorien.ml.org" author[1] = "DaBoMB/dabomb@lorien.ml.org" info[1] = "DaBoMBz DoMaiN" fileid[1] = "1" loc[2] = "addform.html" author[2] = "Joe Burns" info[2] = "A Great JavaScript site" fileid[2] = "2" loc[3] = "mailto:dabomb@lorien.ml.org" author[3] = "Greg Bland/dabomb@lorien.ml.org" info[3] = "Send E-Mail to the author" fileid[3] = "3" </script> <CENTER> <TABLE BORDER=5> <TR> <TD bgcolor="blue" colspan=2><CENTER><h2>MeNu</h2></center> <TR> <TD> <FORM name="chooser"> <select name="choice" onChange = "disp()" size=15> <option selected>Author's Page <option>HTML GOODIES <option>E-mail Author </select> <td> <CENTER><h4>INFO</h4></center> <TEXTAREA name="mesg" rows=10 cols=50> To use this, please select something from the menu on the left and a message will appear here, if you would like to go to that particular option, click the "Goto Option" button. If you would like to see the HTML coding for that webpage, please click on the "See Coding" button. Script by: Greg Bland-dabomb@lorien.ml.org http://dabomb.lorien.ml.org </textarea> <tr> <TD bgcolor="blue" colspan=2> <CENTER> <input type="button" value="Goto Option" onClick = "seeit()"> <input type="button" value="see coding" onClick="viewcode()"> <P>Author<P> <input type="text" name="auth" size=40 value="author of program or site"> </center> </tr> </table> </form>
1998 Copyright (C) Next Step All Rights Reserved